home *** CD-ROM | disk | FTP | other *** search
/ Day Cry / Day Cry CD.bin / oh_towns / tetujin / src.lzh / MAIN.C < prev    next >
Text File  |  1994-05-29  |  3KB  |  120 lines
  1. #include <stdio.h>
  2. #include <stdlib.h>
  3. #include <string.h>
  4. #include <winb.h>
  5. #include <te.h>
  6. #include <fntb.h>
  7. #include <gui.h>
  8.  
  9. char    *guiEgbPtr ;            /*    EGB é╠âÅü[âNâAâhâîâX    */
  10.  
  11. void main()
  12. {
  13.     extern int APL_init() ;
  14.  
  15.     /*    Ævû╜ôIâGâëü[ânâôâhâëé╠ôoÿ^    */
  16.     FM_SetVector() ;
  17.  
  18.     /*    Åëè·ë╗Åêù¥    */
  19.     if (MMI_Open( NULL ) == NOERR)
  20.     {
  21.         /*    Åëè·ë╗é╔ɼî≈é╖éΩé╬âüâCâôâïü[âvé╔ôⁿéΘ.    */
  22.         if (APL_init() == NOERR)
  23.             MMI_ExecSystem() ;
  24.     }
  25.  
  26.     /*    ÅIù╣Åêù¥    */
  27.     MMI_Close() ;
  28.  
  29.     /*    Ævû╜ôIâGâëü[ânâôâhâëé╠ò£ïA    */
  30.     FM_ResetVector() ;
  31. }
  32.  
  33. int APL_init()
  34. {
  35.     extern MMIINIT    initDataIGRABOU ;
  36.     extern MMIINIT    initDataIGRDSK ;
  37.     extern MMIINIT    initDataIGRERR ;
  38.     extern MMIINIT    initDataIGRFILE ;
  39.     extern MMIINIT    initDataIGRSET ;
  40.     extern MMIINIT    initDataIGRWIN ;
  41.  
  42.     register int    ret ;
  43.  
  44.     /*    EGB âÅü[âNâAâhâîâXé╠ĵô╛.    */
  45.     guiEgbPtr = MMI_GetEgbPtr() ;
  46.  
  47.     /*    ânâCâpî^òöòié╠Åëè·ë╗            */
  48.     if ((ret = MMI_initHyper()) < 0)
  49.         return ret ;
  50.     /*    â_âCâAâìâOî^òöòié╠Åëè·ë╗        */
  51.     if ((ret = MMI_initDialogL40()) < 0)
  52.         return ret ;
  53.     /*    âAâëü[âgî^òöòié╠Åëè·ë╗            */
  54.     if ((ret = MMI_initAlertL40()) < 0)
  55.         return ret ;
  56.     /*    âEâCâôâhâEî^òöòié╠Åëè·ë╗        */
  57.     if ((ret = MMI_initWindowL40()) < 0)
  58.         return ret ;
  59.     /*    âüâbâZü[âWî^òöòié╠Åëè·ë╗        */
  60.     if ((ret = MMI_initMessageL40()) < 0)
  61.         return ret ;
  62.     /*    âüâjâàü[î^òöòié╠Åëè·ë╗            */
  63.     if ((ret = MMI_initMenuL40()) < 0)
  64.         return ret ;
  65.     /*    â{â^âôî^òöòié╠Åëè·ë╗            */
  66.     if ((ret = MMI_initButtonL40()) < 0)
  67.         return ret ;
  68.     /*    âhâìâEâ{â^âôî^òöòié╠Åëè·ë╗        */
  69.     if ((ret = MMI_initDrawButtonL40()) < 0)
  70.         return ret ;
  71.     /*    âAâCâRâôâ{â^âôî^òöòié╠Åëè·ë╗    */
  72.     if ((ret = MMI_initIconL40()) < 0)
  73.         return ret ;
  74.     /*    âgâOâïâAâCâRâôî^òöòié╠Åëè·ë╗    */
  75.     if ((ret = MMI_initToggleIconL40()) < 0)
  76.         return ret ;
  77.     /*    âüâjâàü[âAâCâeâÇî^òöòié╠Åëè·ë╗    */
  78.     if ((ret = MMI_initMenuItemL40()) < 0)
  79.         return ret ;
  80.     /*    âXâNâìü[âïî^òöòié╠Åëè·ë╗        */
  81.     if ((ret = MMI_initScrollBarL40()) < 0)
  82.         return ret ;
  83.     /*    âeâLâXâgî^òöòié╠Åëè·ë╗            */
  84.     if ((ret = MMI_initTextL40()) < 0)
  85.         return ret ;
  86.     /*    âèâXâgâüâjâàü[î^òöòié╠Åëè·ë╗    */
  87.     if ((ret = MMI_initListMenuL40()) < 0)
  88.         return ret ;
  89.     /*    ÉöÆlôⁿù═î^òöòié╠Åëè·ë╗            */
  90.     if ((ret = MMI_initNumBoxL40()) < 0)
  91.         return ret ;
  92.  
  93.     /*    öwîiâfü[â^é╠Åëè·ë╗                        */
  94.  
  95.     /*    âfü[â^é╠ôoÿ^        */
  96.     if ((ret = MMI_Init(&initDataIGRABOU)) < 0)
  97.         return ret ;
  98.  
  99.     if ((ret = MMI_Init(&initDataIGRDSK)) < 0)
  100.         return ret ;
  101.  
  102.     if ((ret = MMI_Init(&initDataIGRERR)) < 0)
  103.         return ret ;
  104.  
  105.     if ((ret = MMI_Init(&initDataIGRFILE)) < 0)
  106.         return ret ;
  107.  
  108.     if ((ret = MMI_Init(&initDataIGRSET)) < 0)
  109.         return ret ;
  110.  
  111.     if ((ret = MMI_Init(&initDataIGRWIN)) < 0)
  112.         return ret ;
  113.  
  114.     /*    öwîié≡ò\Īé╖éΘ                            */
  115.     MMI_SendMessage(MMI_GetBaseObj(), MM_SHOW, 0) ;
  116.  
  117.     return NOERR ;
  118. }
  119.  
  120.